10 REM     DRUM MACHINE 64
20 REM    BY THOMAS LANGENS
30 REM   SCHEVENHOFER WEG 44D
40 REM     5600 WUPPERTAL 1
50 REM    TEL: (02053) 40152
60 REM
100 PRINT"[147] EINEN MOMENT BITTE !"
110 POKE53281,15:POKE53280,2
120 FORH=0TO7:READDR$(H):NEXT
130 ZA=1:Z=1:DIMT(32,100)
140 FA=54272:P1=1548:P2=1508
150 GOSUB3500
160 GOSUB1510:POKE198,0
170 GETA$:IFA$=""THEN170
180 IFA$="[133]"THEN1910
190 IFA$="[134]"THEN2330
200 IFA$="[135]"THEN2860
210 IFA$="[136]"THEN3330
220 GOTO170
230 GETA$:IFA$<>""THEN230
240 GETA$:IFA$=""THEN240
250 RETURN
260 PRINT"[147] WELCHE SEQUENZ SOLL EINGESTELLT WERDEN"
270 PRINT" DIE SEQUENZ NR.  ";ZA;:INPUT"[157][157][157][157]";A$
280 IFA$="*"THEN160
290 Z=VAL(A$):IFZ>ZATHENZA=Z
300 IFZ>100THENPRINT"UNERLAUBTER WERT (1-100)":PRINT"[145][145][145][145]";:GOTO270
310 RETURN
320 PRINT"[147][155][146]                        [213]";
330 PRINT"[192][192][192][192][192][192][192][192][192][192][192][192][201][155]            ";
340 PRINT"              [221]F1=SEQUENZ";
350 PRINT"  [221]  [155]   [213][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
360 PRINT"[192][201][155]  [221]F3=MENUE    [221]  [155]   [221][155] ";
370 PRINT"[129]EINSTELLEN DER[155]  [221][155]  [202][192][192][192][192][192]";
380 PRINT"[192][192][192][192][192][192][192][203]  [155]   [221][155]           ";
390 PRINT"      [221][155]                  ";
400 PRINT"[155]   [221][155] [129]"DR$(I)           "  [221][155]   ";
410 PRINT"               [155]   [202][192][192][192][192][192][192]";
420 PRINT"[192][192][192][192][192][192][192][192][192][192][192][203][155]             ";
430 PRINT"     [155]                    ";
440 PRINT"                       [213][192]";
450 PRINT"[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
460 PRINT"[192][192][192][192][192][192][192][201][155]     [221][155]          1";
470 PRINT"[155]         2[155]         3[155]  [221][155]  ";
480 PRINT"[155]   [221] 12345678901234567890";
490 PRINT"123456789012[221][155]  [155]   [221][155]    [221][155] ";
500 PRINT"  [221][155]   [221][155]   [221][155]   [221][155]   [221][155]   [221][155]  ";
510 PRINT" [221][221]  [155]   [221][155] [215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
520 PRINT"[215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][221][155]     [221][155] ";
530 PRINT"[144]^[155]                        ";
540 PRINT"       [221][155]     [202][192][192][192][192][192][192][192][192][192][192][192]";
550 PRINT"[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][203][155]  ";
560 PRINT"                         ";
570 PRINT"                 [213][192][192][192][192][192][192][192]";
580 PRINT"[192][192][192][192][192][192][178][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][201][155]  ";
590 PRINT"       [221]CURSOR TASTEN[221]REC";
600 PRINT"HTS/LINKS[155]   [221][155]       [155]  [221]& ";
610 PRINT"JOYSTICK   [221][155]             ";
620 PRINT"  [221][155]         [171][192][192][192][192][192][192][192][192][192][192][192][192]";
630 PRINT"[192][219][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][179][155]       ";
640 PRINT"  [221]SPACE TASTE[155]  [221]SETZEN/L";
650 PRINT"OESCHEN[221][155]       [155]  [221]& FEUER";
660 PRINT" [155]     [221][155]               [221][155]  ";
670 PRINT"     [155]  [202][192][192][192][192][192][192][192][192][192][192][192][192][192][177][192][192][192]";
680 PRINT"[192][192][192][192][192][192][192][192][192][192][192][192][203]            ";
690 RETURN
700 PRINT"[147][155][146]                         ";
710 PRINT"                 [213][192][192][192][192][192][192][192]";
720 PRINT"[192][192][192][192][192][192][192][192][192][192][201][155]   [155] [213][192][192][192][192][192][192][192][201][155] ";
730 PRINT"       [221][152][213][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][201]";
740 PRINT"[221]  [155]  [221] SPIEL[155] [221][155]      [155]  [221][152][221]D";
750 PRINT"RUM MACHINE 64[152][221][221]  [155]  [221][155]    ";
760 PRINT"   [221][155]        [221][152][202][192][192][192][192][192][192][192][192][192][192][192]";
770 PRINT"[192][192][192][192][203][221][155]   [155] [221][155] MODUS[155] [221][155]      ";
780 PRINT"  [202][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][203]  [155]  ";
790 PRINT"[202][192][192][192][192][192][192][192][203][155]                ";
800 PRINT"                         ";
810 PRINT"       [155]                  ";
820 PRINT"                      [129][213][192][192]";
830 PRINT"[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
840 PRINT"[192][192][192][192][192][192][192][201]  [155]  [129][221][155]          1[155] ";
850 PRINT"        2[155]         3[155]   [129][221][155]  ";
860 PRINT"  [129][221][155] 123456789012345678901";
870 PRINT"23456789012 [129][221]  [155]  [129][221][155]       ";
880 PRINT"                         ";
890 PRINT"  [129][221][155]    [129][221] [215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
900 PRINT"[215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][155] [129][221][155]  [155]  [129][221][155]  ";
910 PRINT"  [129][221][155]   [129][221][155]   [129][221][155]   [129][221][155]   [129][221][155]   [129][221][155]  ";
920 PRINT" [129][221][155]   [129][221][155] [129][221][155]    [129][221][144]            ";
930 PRINT"                      [129][221][155]  ";
940 PRINT"  [129][202][192][192][192][192][177][192][192][192][177][192][192][192][177][192][192][192][177][192][192][192][177][192]";
950 PRINT"[192][192][177][192][192][192][177][192][192][192][177][192][203][155] [129] [155]          ";
960 PRINT"                         ";
970 PRINT"         [144][213][192][192][192][192][192][192][192][192][192][192][192][192][192][201][155] ";
980 PRINT" [213][192][192][192][192][192][192][192][192][192][192][201]       [155]    [144][221]";
990 PRINT"* * * * * * *[144][221][155]  [221]F1 = END";
1000 PRINT"E [221][155]      [144] [155]    [144][221]CURSOR TAS";
1010 PRINT"TEN[144][221][155]  [171][192][192][192][192][192][192][192][192][192][192][179][155]       ";
1020 PRINT"    [144][171][192][192][192][192][192][192][192][192][192][192][192][192][192][179][155]  [221]F3 ";
1030 PRINT"=[155] MENUE[221]       [155]    [144][221]SCHNE";
1040 PRINT"LLER /[155]  [144][221][155]  [202][192][192][192][192][192][192][192][192][192][192][203][155]  ";
1050 PRINT"     [155]    [144][221]LANGSAMER[155]    [144][221][155] ";
1060 PRINT"                    [155]    [144][202]";
1070 PRINT"[192][192][192][192][192][192][192][192][192][192][192][192][192][203][155]           ";
1080 PRINT"                         ";
1090 RETURN
1100 PRINT"[147][213][192][192][192][192][192][192][192][192][192][192][192][192][192][178][192][192][192][192][192][192][192][192][192][192]";
1110 PRINT"[192][192][192][201][192][192][192][192][192][192][192][192][192][201] [221]1= SNARE ";
1120 PRINT"DRUM[221]5=  LOW-TOM[155]  [221]F1[146] MEN";
1130 PRINT"UE [221] [221]2=   AKZENT[155]  [221]6= HI";
1140 PRINT"HAT (ZU)[221]         [221] [221]3= B";
1150 PRINT"ASS  DRUM[221]7= HIHAT (OF)[221]F";
1160 PRINT"3[155][146] SEQ.  [221] [221]4=  HI-TOM[155]   [221]";
1170 PRINT"8=  BECKEN[155]   [221][155]         [221] ";
1180 PRINT"[202][192][192][192][192][192][192][192][192][192][192][192][192][192][177][192][192][192][192][192][192][192][192][192][192]";
1190 PRINT"[192][192][192][203][192][192][192][192][192][192][192][192][192][203] [129][213][192][192][192][192][192][192][192][192][192]";
1200 PRINT"[192][192][192][192][192][144]1[129][192][192][192][192][192][192][192][192][192][144]2[129][192][192][192][192][192][192][192][192][192]";
1210 PRINT"[144]3[129][192][201][155]  [129][221][155]     [144]12345678901234";
1220 PRINT"567890123456789012[155] [144] [129][221][155]    ";
1230 PRINT"    [129][221][155]   [129][221]   [221]   [221]   [221]   [221]";
1240 PRINT"   [221]   [221][155]  [129][221](1)[155]  [215][215][215][215][215][215][215][215][215]";
1250 PRINT"[215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][155]  ";
1260 PRINT"[129][221][155]        [129][221][155]   [129][221]   [221]   [221]   ";
1270 PRINT"[221]   [221]   [221]   [221]  [221](2)[155]  [215][215][215][215]";
1280 PRINT"[215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
1290 PRINT"[215][215][215][155]  [129][221][155]        [129][221][155]   [129][221]   [221]  ";
1300 PRINT" [221]   [221]   [221]   [221]   [221][155]  [129][221](3)[155] ";
1310 PRINT" [215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
1320 PRINT"[215][215][215][215][215][215][215][215][155]  [129][221][155]        [129][221][155]   [129][221] ";
1330 PRINT"  [221]   [221]   [221]   [221]   [221]   [221][155]  ";
1340 PRINT"[129][221](4)[155]  [215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
1350 PRINT"[215][215][215][215][215][215][215][215][215][215][215][215][215][155]  [129][221][155]        [129][221]";
1360 PRINT"[155]   [129][221]   [221]   [221]   [221]   [221]   [221] ";
1370 PRINT"  [221][155]  [129][221](5)[155]  [215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
1380 PRINT"[215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][155]  [129][221][155]    ";
1390 PRINT"    [129][221][155]   [129][221]   [221]   [221]   [221]   [221]";
1400 PRINT"   [221]   [221]  [221](6)[155]  [215][215][215][215][215][215][215][215][215]";
1410 PRINT"[215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][155]  ";
1420 PRINT"[129][221][155]        [129][221][155]   [129][221]   [221]   [221]   ";
1430 PRINT"[221]   [221]   [221]   [221][155]  [129][221](7)[155]  [215][215][215][215]";
1440 PRINT"[215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
1450 PRINT"[215][215][215][155]  [129][221][155]        [129][221][155]   [129][221]   [221]  ";
1460 PRINT" [221]   [221]   [221]   [221]   [221]  [221](8)[155] ";
1470 PRINT" [215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
1480 PRINT"[215][215][215][215][215][215][215][215][155]  [129][202][192][192][192][192][192][192][192][192][177][192][192][192][177][192]";
1490 PRINT"[192][192][177][192][192][192][177][192][192][192][177][192][192][192][177][192][192][192][177][192][192][192][203]";
1500 RETURN
1510 PRINT"[147][144][146]                         ";
1520 PRINT"                   [149] [144]     ";
1530 PRINT" [149][213][192][192][192][192][192][192][192][192][192][192][192][192][192][192][201][144]        ";
1540 PRINT"          [149] [144]     [149][221] [144][162][162][155] [144][172][162] [172]";
1550 PRINT"[155] [144][187][172][155]  [144][187][149][221][155]                 [144] ";
1560 PRINT"[155] [149] [144]  [155] [144] [149][221][155] [144][161][155] [144][191][161][146][162][190][161][155][146] [144][161][161][146][191][191][146][161][149][221][155]   ";
1570 PRINT"          [155]    [144]  [155] [149] [155] [144]  [149][221][155] [144][161][155] ";
1580 PRINT"[144][191][161][146] [161][161][155][146] [144][161][161][155][146]  [144][161][149][221][155]             ";
1590 PRINT"   [144]  [155]   [149] [144] [155] [149][221][155] [144][184][184][155] [144][188] [190][188][162][146][190][188][155]  ";
1600 PRINT"[144][190][149][221][155]                [149] [155]      ";
1610 PRINT" [149][221][155] MACHINE - 64[155] [149][221][155]        ";
1620 PRINT"     [155]    [149] [155]      [149][202][192][192][192][192][192][192][192][192]";
1630 PRINT"[192][192][192][192][192][192][203][155]                 [155] ";
1640 PRINT"[213][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
1650 PRINT"[192][192][201][155]          [155]  [221][213][192][192][192][192][192][192][192][192]";
1660 PRINT"[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][201][221][155]       ";
1670 PRINT"   [155]  [221][221]F1[155] - LADEN/SPEICHE";
1680 PRINT"RN    [221][221][155]          [155]  [221][221][155]   ";
1690 PRINT"                     [221][221][155]  ";
1700 PRINT"[155]        [155]  [221][221]F3[155] - SEQUENZ ";
1710 PRINT"EINSTELLEN[155] [221][221][155]           [155] ";
1720 PRINT"[221][221][155]  [155]                     ";
1730 PRINT" [221][221][155]          [155]  [221][221]F5[155] - APS";
1740 PRINT"PIELEN          [221][221][155]       ";
1750 PRINT"   [155]  [221][221][155]                  ";
1760 PRINT"      [221][221][155]          [155]  [221][221]F7[155] ";
1770 PRINT"-[155] SCHAUTAFEL     [155]    [221][221][155]  ";
1780 PRINT"     [155]     [221][202][192][192][192][192][192][192][192][192][192][192][192][192][192]";
1790 PRINT"[192][192][192][192][192][192][192][192][192][192][192][203][221][155]          [155]  ";
1800 PRINT"[202][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
1810 PRINT"[192][192][203][155]                      ";
1820 PRINT"                         ";
1830 PRINT"                         ";
1840 PRINT"                         ";
1850 PRINT"                         ";
1860 PRINT"                [158]     [155]   [144]*";
1870 PRINT"[155] [144]BY DRUM-FREAK[155]  [144]*[155]    [144] [155]   ";
1880 PRINT"              *[155] THOMAS LA";
1890 PRINT"NGENS[144] *[144]   [144] [155]              ";
1900 RETURN
1910 PRINT"[147]        CASSETTENOPERATIONEN"
1920 PRINT"        [192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]"
1930 PRINT" WOLLEN SIE EINE DATEI LADEN ODER"
1940 PRINT" ABSPEICHERN ?"
1950 PRINT"    F1[146] = LADEN"
1960 PRINT"    F3[146] = SPEICHERN"
1970 GOSUB230
1980 IFA$="*"THEN160
1990 IFA$="[133]"THEN2180
2000 IFA$="[134]"THEN2020
2010 GOTO1970
2020 PRINT"[147]           DATEIEN SPEICHERN"
2030 PRINT"           [192][192][192][192][192][192][192][192][192][192][192][192][192]"
2040 PRINT" BITTE GEBEN SIE EINEN DATEINAMEN EIN"
2050 INPUTN$:IFLEN(N$)>10THENPRINT"ZU LANG!":PRINT"[145][145][145]";:GOTO2050
2060 IFN$="*"THEN160
2070 PRINT" SPULEN SIE DAS BAND AN DIE RICHTIGE"
2080 PRINT" STELLE UND DRUECKEN SIE DANN F1[146]"
2090 GOSUB230
2100 IFA$="*"THEN160
2110 IFA$<>"[133]"THEN2090
2120 OPEN1,1,1,N$
2130 PRINT#1,ZA
2140 FORH=1TOZA
2150 FORI=1TO32:PRINT#1,T(I,H):NEXT:NEXT
2160 CLOSE1
2170 GOTO160
2180 PRINT"[147]          DATEIEN LADEN"
2190 PRINT"          [192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]"
2200 PRINT" BITTE GEBEN SIE DEN DATEINAMEN EIN !"
2210 INPUTN$:IFLEN(N$)>10THENPRINT"ZU LANG":PRINT"[145][145][145]";:GOTO2210
2215 IFN$="*"THEN160
2220 PRINT" BITTE SPULEN SIE DAS BAND AN DIE "
2230 PRINT" RICHTIGE STELLE UND DRUECKEN SIE F1[146]"
2240 GOSUB230
2250 IFA$="*"THEN160
2260 IFA$<>"[133]"THEN2240
2270 OPEN1,1,0,N$
2280 INPUT#1,ZA
2290 FORH=1TOZA
2300 FORI=1TO32:INPUT#1,T(I,H):NEXT:NEXT
2310 CLOSE1:GOTO160
2320 END
2330 GOSUB 260
2340 PRINT"[147]  WELCHER TEIL DES SCHLAGZEUGS SOLL"
2350 PRINT"  EINGESTELLT WERDEN ?"
2360 PRINT"   F1 - SNARE DRUM"
2370 PRINT"   F2 - AKZENT(E)"
2380 PRINT"   F3 - BASS-DRUM"
2390 PRINT"   F4 - HI-HAT (ZU)"
2400 PRINT"   F5 - HI-HAT (OFFEN)"
2410 PRINT"   F6 - BECKEN"
2420 PRINT"   F7 - KLEINE TROMMEL"
2430 PRINT"   F8 - GROSSE TROMMEL"
2440 GOSUB230
2450 IFA$="[133]"THENI=0
2460 IFA$="[137]"THENI=1
2470 IFA$="[134]"THENI=2
2480 IFA$="[138]"THENI=5
2490 IFA$="[135]"THENI=6
2500 IFA$="[139]"THENI=7
2510 IFA$="[136]"THENI=3
2520 IFA$="[140]"THENI=4
2530 IFA$="*"THEN160
2540 PRINT" EINSTELLEN DER(DES) - "DR$(I)"
2550 [153]" IN ORDNUNG (J/N) ?"
2560 [141]230
2570 [139]A$[178]"J"[167]2590
2580 [137]2340
2590 [141]320:[129]H[178]1[164]32:[151]32767[170]H,T(H,Z):[130]
2600 [158]37457,2[174]I
2610 [143]EXT
2620 PO[178]1
2630 [161]A$:[139]A$[178]""[167]2730
2640 [139]A$[178]""[167]2760
2650 [139]A$[178]" "[167]2790
2660 A[178][194](56320):[139]A[178]119[167]2730
2670 [139]A[178]127[167]XX[178]0
2680 [139]A[178]123[167]2760
2690 [139]A[178]111[175][168]XX[178]1[167]2790
2700 [139]A$[178]"INPUT"[167]2340
2710 [139]A$[178]"DIM"[167]160
2720 [137]2630
2730 S[178]PO:PO[178]PO[170]1:[139]PO[177]32[167]PO[178]32:[137]2630
2740 [151]P1[170]S,32:[151]P1[170]PO,30:[151]P1[170]PO[170]FA,0
2750 [137]2630
2760 S[178]PO:PO[178]PO[171]1:[139]PO[179]1[167]PO[178]1:[137]2630
2770 [151]P1[170]S,32:[151]P1[170]PO,30:[151]P1[170]PO[170]FA,0
2780 [137]2630
2790 XX[178]1:S[178][194](P2[170]PO):[139]S[178]81[167]2830
2800 [151]P2[170]PO,81:[151]P2[170]PO[170]FA,2
2810 T(PO,Z)[178]T(PO,Z)[170]2[174]I
2820 [137]2630
2830 [151]P2[170]PO,87:[151]P2[170]PO[170]FA,5
2840 T(PO,Z)[178]T(PO,Z)[171]2[174]I
2850 [137]2630
2860 [153]"LOAD"
2870 [153]" SOLL EINE EINZELNE SEQUENZ ODER"
2880 [153]" MEHRERE HINTEREINANDERABGESPIELT"
2890 [153]" WERDEN ?  (E/M)"
2900 [141]230
2910 [139]A$[178]"E"[167]2950
2920 [139]A$[178]"M"[167]3180
2930 [139]A$[178]"*"[167]160
2940 [137]2900
2950 [153]"LOAD"
2960 [153]" WELCHE SEQUENZ SOLL GESPIELT WERDEN"
2970 [153]"(1)  DIE GERADE EDITIERT WURDE"
2980 [153]"(2)  EINE ANDERE"
2990 [141]230
3000 [139]A$[178]"1"[167]3070
3010 [139]A$[178]"2"[167]3030
3020 [137]2990
3030 [133]" WELCHE ";X$
3040 [139]X$[178]"*"[167]160
3050 X[178][197](X$):[139]X[179]1[176]X[177]ZA[167][153]"ONONON";:[137]3030
3060 Z[178]X
3070 [153]"LOAD EINEN MOMENT BITTE !"
3080 [129]H[178]1[164]32:[151]32767[170]H,T(H,Z):[130]
3090 [151]32768[170]32,255
3100 [141]700:[151]36998,65:[151]36999,65
3110 [151]37000,0:[151]37001,0
3120 [158]37065
3130 [141]230
3140 [139]A$[178]"LET"[167]3120
3150 [139]A$[178]"DIM"[167]160
3160 [139]A$[178]"READ"[167]3110
3170 [137]3130
3180 [153]"LOAD WELCHE SEQUENZEN SOLLEN HINTEREINANDER"
3190 [153]" GESPIELT WERDEN (NICHT MEHR ALS 8 !)"
3200 AA[178]1:QQ[178]32767
3210 [153]"";AA;".TE SEQUENZ NR. ";
3220 [133]SE$
3230 [139]SE$[178]"*"[167]160
3240 [139]SE$[178]""[167]3280
3250 SE(AA)[178][197](SE$):[139]SE(AA)[178]0[167]3280
3260 [139]SE(AA)[179]1[176]SE(AA)[177]100[167][153]"ONON";:[137]3210
3270 AA[178]AA[170]1:[139]AA[179]9[167]3210
3280 [153]"LOAD       EINEN MOMENT BITTE !!!"
3290 [129]H[178]1[164]AA[171]1
3300 [129]I[178]1[164]32:QQ[178]QQ[170]1:[151]QQ,T(I,SE(H)):[130]:[130]
3310 QQ[178]QQ[170]1:[151]QQ,255:[137]3100
3320 [137]3320
3330 [153]"LOAD  DARSTELLUNG FUER WELCHE STIMME ?"
3340 [153]" F1WAIT - DIE GERADE EDITIERTE"
3350 [153]" F3WAIT = EINE ANDERE"
3360 [141]230
3370 [139]A$[178]"INPUT"[167]X[178]Z:[137]3420
3375 [139]A$[178]"*"[167]160
3380 [139]A$[179][177]"DIM"[167]3360
3390 [133]"WELCHE ";X$:X[178][197](X$)
3400 [139]X$[178]"*"[167]160
3410 [139]X[179]1[176]X[177]100[167][153]"ONONON";:[137]3390
3420 [129]H[178]1[164]32:[151]32767[170]H,T(H,X):[130]
3430 [141]1100
3440 [158]37376
3450 [141]230
3460 [139]A$[178]"INPUT"[167]160
3470 [139]A$[178]"DIM"[167]2330
3475 [137]3450
3480 [131]* SNARE DRUM *,*   AKZENTE  *,* BASS  DRUM *,* KL. TROMMEL*
3490 [131]* GR. TROMMEL*,* HIHAT (ZU) *,* HIHAT (OF.)*,*   BECKEN   *
3500 [129]H[178]36864[164]37223:[135]A:[151]H,A:[130]
3510 [131]76,160,144,160,0,152,153,0,212,200,192,25,208,248,96,234,169,33,141
3520 [131]1,212,169,8,141,5,212,169,133,141,4,212,96,169,9,141,8,212,169,40
3530 [131]141,12,212,169,21,141,11,212,96,169,240,141,15,212,169,17,141,19
3540 [131]212,169,37,141,18,212,96,169,32,141,8,212,169,40,141,12,212,169,21
3550 [131]141,11,212,96,169,13,141,8,212,169,40,141,12,212,169,21,141,11,212
3560 [131]96,169,255,141,15,212,169,57,141,19,212,169,133,141,18,212,96,169
3570 [131]250,141,15,212,169,57,141,19,212,169,133,141,18,212,96,169,15,141
3580 [131]24,212,96,22,17,10,138,12,243,12,243,0,208,169,0,160,24,153,0,212
3590 [131]136,16,250,169,10,141,24,212,96,173,134,144,141,135,144,162,32,32
3600 [131]228,255,201,17,208,3,238,134,144,201,29,208,3,206,134,144,201,133
3610 [131]208,1,96,202,208,231,206,135,144,173,135,144,208,221,172,136,144
3620 [131]238,136,144,185,0,128,170,201,255,208,8,169,0,141,136,144,76,201
3630 [131]144,201,0,208,8,162,16,202,208,253,76,62,145,32,160,145,41,2,201
3640 [131]2,208,3,32,128,144,138,41,1,201,1,208,3,32,16,144,138,41,4,201,4
3650 [131]208,3,32,32,144,138,41,8,201,8,208,3,32,64,144,138,41,16,201,16,208
3660 [131]3,32,80,144,138,41,32,201,32,208,3,32,48,144,138,41,64,201,64,208
3670 [131]3,32,96,144,138,41,128,201,128,208,3,32,112,144,234,173,137,144,41
3680 [131]31,168,169,87,153,228,5,169,5,153,228,217,238,137,144,173,137,144
3690 [131]41,31,168,169,81,153,228,5,169,2,153,228,217,76,160,144,238,136,144
3700 [131]96
3710 [129]H[178]37376[164]37491:[135]A:[151]H,A:[130]
3720 [131]169,110,133,251,133,253,169,5,133,252,169,217,133,254,169,1,141,102
3730 [131]3,160,0,185,0,128,45,102,3,205,102,3,208,8,169,81,145,251,169,2,145
3740 [131]253,200,192,32,208,232,24,14,102,3,176,29,165,251,24,105,80,133,251
3750 [131]165,252,105,0,133,252,165,253,24,105,80,133,253,165,254,105,0,133
3760 [131]254,76,19,146,96,32,241,183,142,112,3,160,0,185,0,128,45,112,3,205
3770 [131]112,3,208,10,169,81,153,229,5,169,2,153,229,217,200,192,32,208,230
3780 [131]96
3790 [129]H[178]37217[164]37258:[135]A:[151]H,A:[130]
3800 [131]172,143,144,169,32,153,52,6,173,134,144,170,74,74,74,141,143,144
3810 [131]138,41,7,168,185,131,145,172,143,144,153,52,6,76,160,144,101,84,71
3820 [131]66,93,72,89,103
3830 [129]H[178]37280[164]37296:[135]A:[151]H,A:[130]
3840 [131]169,0,160,24,153,0,212,136,16,250,169,10,141,24,212,138,96
3850 [129]H[178]1[164]08:[129]I[178]1[164]32
3860 [135]T(I,H):[130]:[130]:ZA[178]08:[142]
3870 [131]6,0,32,4,1,0,32,4,4,0,36,4,1,8,40,4,2,4,32,4,1,0,36,0,4,0,32,0,33
3880 [131]16,48,0,4,4,4,4,1,4,4,4,0,4,4,4,1,0,0,4,4,0,4,0,1,4,0,0,4,0,4,0,1
3890 [131]1,1,0,5,5,5,5,5,0,5,5,5,5,5,0,0,0,0,0,5,5,5,5,0,5,5,0,5,0,5,0,5,0
3900 [131]5,5,4,0,32,4,1,0,32,4,4,0,32,4,1,4,32,4,4,0,32,4,1,0,32,4,4,0,32
3910 [131]4,1,4,32,4,68,0,0,0,33,0,0,32,68,0,0,0,33,0,0,32,68,0,0,0,33,0,0
3920 [131]32,68,0,0,0,33,0,0,32,35,0,0,0,1,0,1,0,99,0,0,0,12,0,32,0,14,0,0
3930 [131]0,1,0,0,0,80,0,0,0,20,0,0,0,44,0,32,0,72,0,36,0,40,0,36,0,72,0,36
3940 [131]0,44,0,32,0,72,0,36,0,40,0,36,0,72,0,36,0,1,0,1,1,65,0,8,0,1,0,1
3950 [131]0,65,0,16,0,1,0,1,1,65,0,8,0,1,0,1,0,80,0,16,0